VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "IBlock"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Public Function AddBlock() As Object
End Function

Public Function AddPort() As Object
End Function

Public Function AddActivator() As Object
End Function

Public Function OpenBlock() As Boolean
End Function

Public Sub Resize(ByVal Width As Long, ByVal Height As Long)
End Sub

Public Sub DragDrop(ByVal X As Long, ByVal Y As Long)
End Sub

Public Sub Clean()
End Sub

